home *** CD-ROM | disk | FTP | other *** search
/ Tech Arsenal 1 / Tech Arsenal (Arsenal Computer).ISO / tek-01 / castools.zip / FUNC2H.ASM < prev    next >
Assembly Source File  |  1989-08-09  |  843b  |  31 lines
  1. Include multi.inc
  2. Include model.inc
  3.  
  4. ;==============================================================================
  5. ;
  6. ;   CAS function 2h -- Abort Current Event
  7. ;
  8. ;   Format:
  9. ;               CASAbortCurrentEvent (void)
  10. ;   Input:
  11. ;               none
  12. ;   Output:
  13. ;               returns the event handle of the aborted event or negative
  14. ;               error code.
  15. ;==============================================================================
  16.  
  17.                 .CODE
  18. CASAbortCurrentEvent    PROC     
  19.  
  20.                 mov     ax,MUX          ; multiplex number -> al
  21.                 mov     ah,al           ; multiplex number -> ah
  22.                 mov     al,2h           ; CAS function 2
  23.                 int     2Fh
  24.  
  25.                 ret
  26. CASAbortCurrentEvent    endp
  27.      
  28.                 END
  29.                 
  30.  
  31.